is-in-range[2,4] ssplit |0123456>
|no> . |no> . |yes> . |yes> . |yes> . |no> . |no>
not |yes> => |no>
not |no> => |yes>
is-a-child |*> #=> is-in-range[0,17] age |_self>
is-a-teenager |*> #=> is-in-range[13,19] age |_self>
is-an-adult |*> #=> not is-in-range[0,17] age |_self>
age |Emma> => |14>
age |Bella> => |18>
age |Fred> => |34>
table[person, age, is-a-child, is-a-teenager, is-an-adult] split[" "] |Emma Bella Fred>
+--------+-----+------------+---------------+-------------+
| person | age | is-a-child | is-a-teenager | is-an-adult |
+--------+-----+------------+---------------+-------------+
| Emma | 14 | yes | yes | no |
| Bella | 18 | no | yes | yes |
| Fred | 34 | no | no | yes |
+--------+-----+------------+---------------+-------------+
-- if the ket has no float value then return the empty ket |>
is-in-range[13, 17] |the cat>
|>